home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 002a / corewar.zip / NOGEMINI.PRG < prev    next >
Text File  |  1990-07-05  |  159b  |  9 lines
  1. BGN AntiGemini
  2.     JMP B
  3. A    DAT -Grid_Size-1
  4. B    JWN C @A        ;Don't hit self
  5.     MOV #0 @A        ;Zero bomb
  6. C    SUB #Grid_Size+1 A    ;Go diagonally
  7.     JMP B            ;Iterate
  8. END
  9.